﻿Public Class ListarProp

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_CERRAR.Click
        Me.Close()
    End Sub

    Private Sub CortarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub EditarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EditarToolStripMenuItem.Click

    End Sub

    Private Sub SeleccionarTodoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SeleccionarTodoToolStripMenuItem.Click
        Me.Rtxt_Propiedades_Objetos.SelectAll()
    End Sub

    Private Sub SeleccionarTodoToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SeleccionarTodoToolStripMenuItem1.Click
        Me.Rtxt_Propiedades_Objetos.SelectAll()
    End Sub

    Private Sub CortarToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CortarToolStripMenuItem1.Click
        Me.Rtxt_Propiedades_Objetos.Cut()
    End Sub

    Private Sub CortarToolStripMenuItem_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CortarToolStripMenuItem.Click
        Me.Rtxt_Propiedades_Objetos.Cut()
    End Sub

    Private Sub CopiarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CopiarToolStripMenuItem.Click
        Me.Rtxt_Propiedades_Objetos.Copy()
    End Sub

    Private Sub CopiarToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CopiarToolStripMenuItem1.Click
        Me.Rtxt_Propiedades_Objetos.Copy()
    End Sub

    Private Sub PegarToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PegarToolStripMenuItem1.Click
        Me.Rtxt_Propiedades_Objetos.Paste()
    End Sub

    Private Sub PegarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PegarToolStripMenuItem.Click
        Me.Rtxt_Propiedades_Objetos.Paste()
    End Sub

    Private Sub DeshacerToolStripMenuItem4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DeshacerToolStripMenuItem4.Click
        Me.Rtxt_Propiedades_Objetos.Undo()
    End Sub

    Private Sub ToolStripMenuItem3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem3.Click
        Me.Rtxt_Propiedades_Objetos.Undo()
    End Sub

    Private Sub SelecciontarYCopiarTodoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SelecciontarYCopiarTodoToolStripMenuItem.Click
        Me.Rtxt_Propiedades_Objetos.SelectAll()
        Me.Rtxt_Propiedades_Objetos.Copy()
    End Sub

    Private Sub SeleccionarYCopiarTodoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SeleccionarYCopiarTodoToolStripMenuItem.Click
        Me.Rtxt_Propiedades_Objetos.SelectAll()
        Me.Rtxt_Propiedades_Objetos.Copy()
    End Sub

    Private Sub ListarProp_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated

    End Sub

    Private Sub ListarProp_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown
        Rtxt_Propiedades_Objetos.Focus()
    End Sub

    Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn3EN1.Click
        Me.Rtxt_Propiedades_Objetos.SelectAll()
        Me.Rtxt_Propiedades_Objetos.Copy()
        Me.Close()
    End Sub
End Class